home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Run Magazine ReRun 1985 Fall
/
rerun-1985-fall.d64
/
64 directory
(
.txt
)
next >
Wrap
Commodore BASIC
|
2022-09-20
|
3KB
|
67 lines
10 data 120,173,20,3,141,211,195,173,21,3,141,212,1413
20 data 195,169,33,141,20,3,169,193,141,21,3,169,1257
30 data 0,141,213,195,141,216,195,88,96,165,197,201,1848
40 data 5,208,5,173,213,195,240,3,108,211,195,169,1725
50 data 255,141,213,195,56,32,240,255,142,214,195,140,2078
60 data 215,195,169,1,133,204,165,251,141,207,195,165,2041
70 data 252,141,208,195,165,253,141,209,195,165,254,141,2319
80 data 210,195,169,0,133,251,169,8,133,252,169,0,1689
90 data 133,253,169,160,133,254,160,0,162,4,177,251,1856
100 data 145,253,200,208,249,230,252,230,254,202,208,242,2673
110 data 32,90,195,32,135,194,169,52,133,251,169,8,1460
120 data 133,252,169,36,141,139,195,162,139,160,195,169,1890
130 data 1,32,189,255,169,14,160,96,162,8,32,186,1304
140 data 255,32,192,255,169,8,32,180,255,169,96,32,1675
150 data 150,255,230,199,160,0,132,144,32,165,255,166,1888
160 data 144,208,74,201,34,208,241,32,165,255,166,144,1872
170 data 208,63,201,34,240,5,32,52,195,208,240,165,1643
180 data 199,240,8,198,199,169,122,133,251,208,213,24,1964
190 data 169,20,101,251,133,251,144,2,230,252,165,251,1969
200 data 201,154,208,196,165,252,201,11,208,190,32,234,2052
210 data 194,32,108,194,32,90,195,169,42,133,251,169,1609
220 data 8,133,252,208,171,169,14,32,195,255,32,171,1640
230 data 255,32,161,194,32,135,194,32,234,194,32,108,1603
240 data 194,169,54,133,1,169,0,133,251,169,8,133,1414
250 data 252,169,0,133,253,169,160,133,254,160,0,162,1845
260 data 4,177,253,145,251,200,208,249,230,252,230,254,2453
270 data 202,208,242,169,55,133,1,173,207,195,133,251,1969
280 data 173,208,195,133,252,173,209,195,133,253,173,210,2307
290 data 195,133,254,32,15,195,169,0,133,204,174,214,1718
300 data 195,172,215,195,24,32,240,255,169,0,141,213,1851
310 data 195,76,188,254,162,24,160,0,24,32,240,255,1610
320 data 160,0,185,115,195,240,6,32,210,255,200,208,1806
330 data 245,32,228,255,240,251,96,173,134,2,160,0,1816
340 data 153,0,216,153,0,217,153,0,218,136,208,244,1698
350 data 160,232,153,255,218,136,208,250,96,169,8,32,1917
360 data 180,255,169,111,32,150,255,160,0,32,165,255,1764
370 data 153,139,195,200,192,40,240,4,201,13,208,241,1826
380 data 169,0,153,139,195,160,0,185,139,195,201,50,1586
390 data 144,28,173,216,195,208,3,32,234,194,160,0,1587
400 data 162,0,24,32,240,255,185,139,195,32,210,255,1729
410 data 200,185,139,195,208,247,32,171,255,96,173,216,2117
420 data 195,208,31,169,255,141,216,195,160,25,185,217,1997
430 data 0,153,180,195,136,16,247,173,24,208,41,15,1388
440 data 9,32,141,24,208,169,8,141,136,2,96,173,1139
450 data 216,195,240,31,169,0,141,216,195,160,25,185,1773
460 data 180,195,153,217,0,136,16,247,173,24,208,41,1590
470 data 15,9,16,141,24,208,169,4,141,136,2,96,961
480 data 41,127,201,64,144,10,201,97,176,4,41,191,1297
490 data 144,2,41,223,141,217,195,165,199,240,8,173,1748
500 data 217,195,9,128,141,217,195,173,217,195,145,251,2083
510 data 200,96,169,32,160,0,153,0,8,153,0,9,980
520 data 153,0,10,136,208,244,160,232,153,255,10,136,1697
530 data 208,250,96,72,73,84,32,65,78,89,32,75,1154
540 data 69,89,32,84,79,32,67,79,78,84,73,78,844
550 data 85,69,0,0,0,0,0,0,0,0,0,0,154
1000 sa=49408:be=sa:l=10:nl=55
1010 print"loading...":print
1020 fori=1tonl:cs=0
1030 forj=0to11:readk:ifk>255then1100
1040 pokesa+j,k:cs=cs+k:next
1050 readlt:iflt<>csthen1100
1060 sa=sa+12:l=l+10:next
1070 printchr$(17)spc(6)"commodore 64 disk directory"
1080 printchr$(17)spc(12)"by robin franzel"
1090 sysbe:new
1100 print"error in data statement #";l